% username=trim(request.form("username")) if request("step")=1 then '第一步,判断用户名是否存在 if username<>"" then set rs=server.createobject("adodb.recordset") sql="select id,username,question,answer from [web_register] where username='"&username&"'" rs.open(sql),cn,1,1 if rs.eof then response.write"" else response.redirect "get2.asp?UserId="&rs("id") end if rs.close set rs=nothing end if end if %>